MODULE t1;
IMPORT Out;
TYPE t = SHORTINT;

CONST s = "!23";

BEGIN

Out.String(s)

END t1.

(* 
Incompatible types
java.lang.RuntimeException
	at ru.msu.cmc.sp.oberon2.Types.reportError(Types.java:139)
	at ru.msu.cmc.sp.oberon2.Types.expr(Types.java:1507)
	at ru.msu.cmc.sp.oberon2.Types.exprRoot(Types.java:1168)
	at ru.msu.cmc.sp.oberon2.Types.topdown(Types.java:221)
	at ru.msu.cmc.sp.oberon2.Types.topdown(Types.java:1)
	at org.antlr.runtime.tree.TreeRewriter$2.rule(TreeRewriter.java:108)
	at org.antlr.runtime.tree.TreeRewriter.applyOnce(TreeRewriter.java:61)
	at org.antlr.runtime.tree.TreeRewriter$1.pre(TreeRewriter.java:92)
	at org.antlr.runtime.tree.TreeVisitor.visit(TreeVisitor.java:56)
	at org.antlr.runtime.tree.TreeVisitor.visit(TreeVisitor.java:60)
	at org.antlr.runtime.tree.TreeVisitor.visit(TreeVisitor.java:60)
	at org.antlr.runtime.tree.TreeVisitor.visit(TreeVisitor.java:60)
	at org.antlr.runtime.tree.TreeRewriter.downup(TreeRewriter.java:95)
	at org.antlr.runtime.tree.TreeRewriter.downup(TreeRewriter.java:86)
	at ru.msu.cmc.sp.oberon2.Oberon2.analysis(Oberon2.java:29)
	at ru.msu.cmc.sp.oberon2.Oberon2.main(Oberon2.java:47)

*)